From 0192ee4eeb8085cdcaa98040cbf7ebae6b06f480 Mon Sep 17 00:00:00 2001 From: Dave Love Date: Fri, 5 Jan 2001 16:39:40 +0000 Subject: [PATCH] (remove, remq): Remove. --- lisp/emacs-lisp/cl-seq.el | 3 --- 1 file changed, 3 deletions(-) diff --git a/lisp/emacs-lisp/cl-seq.el b/lisp/emacs-lisp/cl-seq.el index 90fba3cfe3a..bea91dc3098 100644 --- a/lisp/emacs-lisp/cl-seq.el +++ b/lisp/emacs-lisp/cl-seq.el @@ -322,9 +322,6 @@ This is a destructive function; it reuses the storage of SEQ whenever possible. Keywords supported: :key :count :start :end :from-end" (apply 'delete* nil cl-list :if-not cl-pred cl-keys)) -(defun remove (x y) (remove* x y :test 'equal)) -(defun remq (x y) (if (memq x y) (delq x (copy-list y)) y)) - (defun remove-duplicates (cl-seq &rest cl-keys) "Return a copy of SEQ with all duplicate elements removed. Keywords supported: :test :test-not :key :start :end :from-end" -- 2.30.2